object SetRightsWin: TSetRightsWin Left = 335 Top = 197 BorderStyle = bsDialog ClientHeight = 295 ClientWidth = 559 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [] OldCreateOrder = False Position = poScreenCenter Scaled = False OnClose = FormClose OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object PageControl1: TPageControl Left = 8 Top = 8 Width = 545 Height = 249 ActivePage = TabSheet1 TabIndex = 0 TabOrder = 0 OnChange = PageControl1Change object TabSheet1: TTabSheet Caption = 'Banowanie' object Label4: TLabel Left = 8 Top = 28 Width = 313 Height = 13 Caption = 'Podaj login osoby lub jej pseudonim (z ~ na pocz'#261'tku)' end object Label5: TLabel Left = 8 Top = 76 Width = 226 Height = 13 Caption = 'Czas zabanowania osoby w tym pokoju' end object Label6: TLabel Left = 8 Top = 124 Width = 115 Height = 13 Caption = 'Pow'#243'd zabanowania' end object Edit2: TEdit Left = 336 Top = 24 Width = 169 Height = 21 TabOrder = 0 end object ComboBox3: TComboBox Left = 248 Top = 72 Width = 257 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 1 OnChange = ComboBox3Change end object ComboBox5: TComboBox Left = 248 Top = 120 Width = 257 Height = 21 ItemHeight = 13 TabOrder = 2 OnChange = Edit3Change OnKeyPress = Edit3KeyPress end end object TabSheet2: TTabSheet Caption = 'Prawa u'#380'ytkownika' ImageIndex = 1 object Label1: TLabel Left = 8 Top = 28 Width = 313 Height = 13 Caption = 'Podaj login osoby lub jej pseudonim (z ~ na pocz'#261'tku)' end object Label2: TLabel Left = 8 Top = 76 Width = 73 Height = 13 Caption = 'Prawa osoby' end object Label3: TLabel Left = 8 Top = 124 Width = 214 Height = 13 Caption = 'Prawo g'#322'osu w pokoju moderowanym' end object Edit1: TEdit Left = 336 Top = 24 Width = 169 Height = 21 TabOrder = 0 end object ComboBox1: TComboBox Left = 248 Top = 72 Width = 257 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 1 end object ComboBox2: TComboBox Left = 248 Top = 120 Width = 257 Height = 21 Style = csDropDownList Enabled = False ItemHeight = 13 TabOrder = 2 end end object TabSheet3: TTabSheet Caption = 'Listy u'#380'ytkownik'#243'w' ImageIndex = 2 object ComboBox4: TComboBox Left = 8 Top = 8 Width = 521 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 0 end object ListView1: TListView Left = 8 Top = 32 Width = 521 Height = 185 Columns = < item Caption = 'Osoba' Width = 100 end item Caption = 'Pseudonim' Width = 100 end item Caption = 'Wygasa' Width = 80 end item Caption = 'Uzasadnienie' Width = 200 end item Caption = 'Czas' Width = 135 end item Caption = 'Admin' Width = 100 end> ReadOnly = True RowSelect = True PopupMenu = PopupMenu1 TabOrder = 1 ViewStyle = vsReport OnContextPopup = ListView1ContextPopup end end end object Button1: TButton Left = 372 Top = 264 Width = 99 Height = 25 Caption = 'Wyrzu'#263 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = Button1Click end object Button2: TButton Left = 478 Top = 264 Width = 75 Height = 25 Caption = 'Anuluj' TabOrder = 2 OnClick = Button2Click end object PopupMenu1: TPopupMenu Left = 28 Top = 80 object Odbanuj1: TMenuItem Caption = 'Odbanuj' OnClick = Odbanuj1Click end end end